home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Libris Britannia 4
/
science library(b).zip
/
science library(b)
/
MATHEMAT
/
2632.ZIP
/
MERCURYZ.EXE
/
POLY.EKA
< prev
next >
Wrap
Text File
|
1992-03-24
|
278b
|
13 lines
; Demo of polynomial root finder.
; Finds all real and complex roots of a polynomial.
; Find roots to x^3 - x^2 - x - 1 = 0.
f(x) := POLY(x,1,-1,-1,-1)
SOLVE f
; Find 10-th roots of unity, solutions to x^10 = 1.
g(x) := POLY(x,1,0,0,0,0,0,0,0,0,0,-1)
; SOLVE g